home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 136 / 136.d81 / rom read 1571 (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1995-01-01  |  197 b   |  9 lines
  1. 10 input"[147]device number";d
  2. 20 open15,d,15
  3. 30 print#15,"m-r"chr$(0)chr$(192)chr$(1):get#15,a$:a=asc(a$)
  4. 40 ifa=56thenprint"new rom":goto80
  5. 50 ifa=66thenprint"old rom":goto80
  6. 60 ifa=132thenprint"128d":goto80
  7. 70 print"not recognized 1571 rom"
  8. 80 close15
  9.